package com.miku.sys.security.realm;

import java.io.Serializable;
import java.util.Collection;
import java.util.List;

import javax.annotation.PostConstruct;

import org.apache.commons.lang3.StringUtils;
import org.apache.shiro.authc.AuthenticationException;
import org.apache.shiro.authc.AuthenticationInfo;
import org.apache.shiro.authc.AuthenticationToken;
import org.apache.shiro.authc.SimpleAuthenticationInfo;
import org.apache.shiro.authc.credential.HashedCredentialsMatcher;
import org.apache.shiro.authz.AuthorizationInfo;
import org.apache.shiro.authz.Permission;
import org.apache.shiro.authz.SimpleAuthorizationInfo;
import org.apache.shiro.realm.AuthorizingRealm;
import org.apache.shiro.subject.PrincipalCollection;
import org.apache.shiro.util.ByteSource;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;

import com.alibaba.fastjson.JSON;
import com.miku.db.sys.entity.SysRole;
import com.miku.db.sys.entity.SysUser;
import com.miku.sys.config.Global;
import com.miku.sys.services.SystemServiceI;
import com.miku.sys.utils.UserUtils;
import com.miku.utils.Encodes;

/**
 * 系统安全认证实现类
 */
@Service
public class SystemAuthorizingRealm extends AuthorizingRealm {

	private Logger logger = LoggerFactory.getLogger(getClass());
	@Autowired SystemServiceI system;
	
	public SystemAuthorizingRealm(){
		super();
	}
	
	/**
	 * 认证回调函数, 登录时调用
	 */
	@Override
	protected AuthenticationInfo doGetAuthenticationInfo(AuthenticationToken authcToken) {
		LcUsernamePasswordToken token = (LcUsernamePasswordToken) authcToken;
		//int activeSessionSize = getSystemService().getSessionDao().getActiveSessions(false).size();
		//logger.debug("login submit, active session size: {}, username: {}", activeSessionSize, token.getUsername());
		
		// 校验登录验证码
	/*	if (LoginController.isValidateCodeLogin(token.getUsername(), false, false)){
			Session session = UserUtils.getSession();
			String code = (String)session.getAttribute(ValidateCodeServlet.VALIDATE_CODE);
			if (token.getCaptcha() == null || !token.getCaptcha().toUpperCase().equals(code)){
				throw new AuthenticationException("msg:验证码错误, 请重试.");
			}
		}*/
		logger.debug("校验帐号密码...");
		
		// 校验用户名密码
		SysUser user = token.getLoginOfUser();
		boolean isLoginOfDirectUser = user != null;			//直接给予用户进行登录的
		if(!isLoginOfDirectUser){
			if(StringUtils.isBlank(token.getUsername())){
				//如果为空帐号，则不允许登录
				throw new AuthenticationException("无效的帐号.");
			}
			user = system.findByLoginName(token.getUsername());
		}else
			logger.debug("直接通过用户对象登录，而非帐号密码：" + user.getNickname());
		
		if (user != null) {
			if (Global.NO.equals(user.getAllowloign())){
				throw new AuthenticationException("msg:该已帐号禁止登录.");
			}
			
			if(!isLoginOfDirectUser){
				byte[] salt = Encodes.decodeHex(user.getPassword().substring(0,16));
				return new SimpleAuthenticationInfo(new Principal(user, token.isMobileLogin()), 
						user.getPassword().substring(16), ByteSource.Util.bytes(salt), getName());
			}else{
				//如果是直接用户授权，则直接验证密码就好了，管TM什么盐不盐
				String empty = UserUtils.entryptPassword("");
				byte[] salt = Encodes.decodeHex(empty.substring(0,16));
				return new SimpleAuthenticationInfo(new Principal(user, token.isMobileLogin()), 
						empty.substring(16), ByteSource.Util.bytes(salt), getName());
			}
		} else {
			return null;
		}
	}

	/**
	 * 授权查询回调函数, 进行鉴权但缓存中无用户的授权信息时调用
	 */
	@Override
	protected AuthorizationInfo doGetAuthorizationInfo(PrincipalCollection principals) {
		//logger.debug("授权查询回调函数0");
		Principal principal = (Principal) getAvailablePrincipal(principals);
		//logger.debug("授权查询回调函数1");
		
		// 获取当前已登录的用户
		/*if (!Global.TRUE.equals(Global.getConfig("user.multiAccountLogin"))){
			Collection<Session> sessions = system.getSessionDao().getActiveSessions(true, principal, UserUtils.getSession());
			if (sessions.size() > 0){
				// 如果是登录进来的，则踢出已在线用户
				if (UserUtils.getSubject().isAuthenticated()){
					for (Session session : sessions){
						system.getSessionDao().delete(session);
					}
				}
				// 记住我进来的，并且当前用户已登录，则退出当前用户提示信息。
				else{
					UserUtils.getSubject().logout();
					throw new AuthenticationException("msg:账号已在其它地方登录，请重新登录。");
				}
			}
		}*/
		//logger.debug("获取用户信息0");
		SysUser user = system.findByLoginName(principal.getLoginName());
		logger.debug("授权查询回调，用户：" + JSON.toJSONString(user));
		if (user != null) {
			SimpleAuthorizationInfo info = new SimpleAuthorizationInfo();
			for(SysRole u : user.getRoles()){
				info.addRole(u.getName());
				
				for (String permission : StringUtils.split(u.getPermissions(), ",")){
					info.addStringPermission(permission);
				}
			}
			
			// 添加用户权限和角色
			info.addRole("user");
			info.addStringPermission("user");
			
			// 更新登录IP和时间
			system.updateUserLoginInfo(user);
			// 记录登录日志
			//LogUtils.saveLog(Servlets.getRequest(), "系统登录");
			//logger.debug("登录系统：" + Servlets.getRequest().getRequestURI());
			return info;
		} else {
			return null;
		}
	}
	
	@Override
	protected void checkPermission(Permission permission, AuthorizationInfo info) {
		authorizationValidate(permission);
		super.checkPermission(permission, info);
	}
	
	@Override
	protected boolean[] isPermitted(List<Permission> permissions, AuthorizationInfo info) {
		if (permissions != null && !permissions.isEmpty()) {
            for (Permission permission : permissions) {
        		authorizationValidate(permission);
            }
        }
		return super.isPermitted(permissions, info);
	}
	
	@Override
	public boolean isPermitted(PrincipalCollection principals, Permission permission) {
		authorizationValidate(permission);
		return super.isPermitted(principals, permission);
	}
	
	@Override
	protected boolean isPermittedAll(Collection<Permission> permissions, AuthorizationInfo info) {
		if (permissions != null && !permissions.isEmpty()) {
            for (Permission permission : permissions) {
            	authorizationValidate(permission);
            }
        }
		return super.isPermittedAll(permissions, info);
	}
	
	/**
	 * 授权验证方法
	 * @param permission
	 */
	private void authorizationValidate(Permission permission){
		// 模块授权预留接口
		//logger.debug("authorizationValidate 验证权限.~");
	}
	
	/**
	 * 设定密码校验的Hash算法与迭代次数
	 */
	@PostConstruct
	public void initCredentialsMatcher() {
		HashedCredentialsMatcher matcher = new HashedCredentialsMatcher(UserUtils.HASH_ALGORITHM);
		matcher.setHashIterations(UserUtils.HASH_INTERATIONS);
		setCredentialsMatcher(matcher);
	}
	
//	/**
//	 * 清空用户关联权限认证，待下次使用时重新加载
//	 */
//	public void clearCachedAuthorizationInfo(Principal principal) {
//		SimplePrincipalCollection principals = new SimplePrincipalCollection(principal, getName());
//		clearCachedAuthorizationInfo(principals);
//	}

	/**
	 * 清空所有关联认证
	 * @Deprecated 不需要清空，授权缓存保存到session中
	 */
	@Deprecated
	public void clearAllCachedAuthorizationInfo() {
//		Cache<Object, AuthorizationInfo> cache = getAuthorizationCache();
//		if (cache != null) {
//			for (Object key : cache.keys()) {
//				cache.remove(key);
//			}
//		}
	}
	/**
	 * 授权用户信息
	 */
	public static class Principal implements Serializable {

		private static final long serialVersionUID = 1L;
		
		private int id; // 编号
		private String loginName; // 登录名
		private String nickName; // 姓名
		private boolean mobileLogin; // 是否手机登录
		
//		private Map<String, Object> cacheMap;

		public Principal(SysUser user, boolean mobileLogin) {
			this.id = user.getId();
			this.loginName = user.getLoginName();
			this.nickName = user.getNickname();
			this.mobileLogin = mobileLogin;
		}

		public String getNickName() {
			return nickName;
		}

		public int getId() {
			return id;
		}

		public String getLoginName() {
			return loginName;
		}

		public boolean isMobileLogin() {
			return mobileLogin;
		}

//		@JsonIgnore
//		public Map<String, Object> getCacheMap() {
//			if (cacheMap==null){
//				cacheMap = new HashMap<String, Object>();
//			}
//			return cacheMap;
//		}

		/**
		 * 获取SESSIONID
		 */
		public String getSessionid() {
			try{
				return (String) UserUtils.getSession().getId();
			}catch (Exception e) {
				return "";
			}
		}

		@Override
		public String toString() {
			return JSON.toJSONString(this);
		}

	}
}
